Top 10k strings from Weather Picture Printing (1988)(C. Grant Dixon).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

   2 "Filename? ";z$
   1 y$="Southbound":
   1 y$="Northbound":
   1 s$=".GMT":
   1 s$=".BST":
   1 l$=l$+" Deg.W.":
   1 WXPR      :
   1 WXCODE    1
   1 Created with Ramsoft MakeTZX
   1 ;"WEATHER PICTURE PRINTING"
   1 ;"Store erased"
   1 ;"Printing picture..SPACE cancels"
   1 ;"Please give some details :-"
   1 ;"Picture loaded"
   1 ;"Loading picture..SPACE cancels"
   1 ;"LONGITUDE"
   1 ;"Greyscale added"
   1 ;"DIRECTION";
   1 ;"Any key to start loading":
   1 ;"Any key to return":
   1 ;"------------------------":
   1 ..Set bits for input
   1 ..Load code
   1 ..Initialise interface
   1 ..Fetching from disc
   1 ..A Control
   1 ...WEATHER PICTURE PRINTING
   1 ...Useful save routines
   1 ...Saving to disc
   1 ...Printing picture
   1 ...Port 63 is A (INPUT)
   1 ...Load code section
   1 ...LOADING
   1 ...Initialising routine
   1 ...Erasing
   1 ...Adding greyscale
   1 "Time of day? ";e$
   1 "Summer Time?..Y/N ";s$:
   1 "SATELLITE";
   1 "S...To Save to disc ":
   1 "Print details?..Y/N ";t$
   1 "P...To Print picture":
   1 "Option ? ";a$
   1 "North- or Southbound?..N/S ";y$:
   1 "North- or Southbound?..N/S ";d$
   1 "Name of satellite? ";n$
   1 "L...To Load picture.":
   1 "G...To add Greyscale":
   1 "F...To Fetch from disc":
   1 "Equator crossing longitude? ";l$:
   1 "E...To Erase picture store":
   1 "Date? ";d$:
   1 "C...To catalogue Disc 1."
   1 "B...To return to BASIC":
   1 "4 rows of dots = 1 picture":
   1  C.Grant DIXON 1988